home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / msdos / raytrace / pov / gen / form04a / sue / mutation.frm < prev    next >
Text File  |  1994-01-25  |  894b  |  30 lines
  1. Copyright (c) Sue Cunningham
  2.  
  3. // starting point a very simple web
  4. s1 = ellipse <0.5, 0.2, 2> stack 50 in 15;
  5. s2 = sphere 0.1 stack 50 in 10%;
  6. web1 = s1 web 3 with s2 1;
  7. //second mutation
  8. s3 = sphere 0.1 stack 50 in 10% bend 60;
  9. web2 = s1 web 3 with s3 1;
  10. //third mutation
  11. s4 = ellipse <0.5, 0.2, 2> stack 50 in 15 twist 180;
  12. web3 = s4 web 3 with s3 1;
  13. //fourth mutation
  14. s5 = ellipse <0.5, 0.2, 2> stack 50 in 15 twist 360;
  15. web4 = s5 web 4 with s3 1;
  16. //fifth mutation
  17. s6 = sphere 0.1 stack 50 in 10% bend 120;
  18. web5 = s5 web 4 with s6 1;
  19. //sixth mutation
  20. web6 = s5 web 5 with s6 1;
  21. //seventh mutation
  22. s7 = ellipse <0.5, 0.2, 2> stack 50 in 15 twist 360 bend 45;
  23. web7 = s7 web 5 with s6 1;
  24. //final form
  25. spoke1 = ellipse <0.5, 0.2, 2> stack 50 in 15 twist 2*360, 0.5 bend 45;
  26. spoke2 = sphere 0.1 stack 50 in 10% bend 120;
  27. web8 = spoke1 web 5 with spoke2 1 ;
  28. web2;
  29. end;
  30.